home *** CD-ROM | disk | FTP | other *** search
/ MacUser Mac Bin 28 / MACUSER-MACBIN28A-1996-03.ISO.7z / MACUSER-MACBIN28A-1996-03.ISO / 本誌連動データ / EDEN 1996⁄3号用データ / 2Balls.PTS < prev    next >
Text File  |  1995-10-09  |  4KB  |  240 lines
  1. ' **axiscount: 4
  2.  
  3.  let axis.wv    500.000000    500.000000    500.000000
  4.  let axis.nv    500.000000    500.000000    500.000000
  5.  let axis.u    36.000000
  6.  let axis.v    0.000000
  7.  axis.add ; '---------- axis no. 0
  8.  let axis.wv    0.000000    180.000000    0.000000
  9.  let axis.nv    0.000000    360.000000    0.000000
  10.  let axis.u    0.000000
  11.  let axis.v    0.000000
  12.  axis.add ; '---------- axis no. 1
  13.  let axis.wv    1000.000000    500.000000    0.000000
  14.  let axis.nv    500.000000    500.000000    500.000000
  15.  let axis.u    36.000000
  16.  let axis.v    0.000000
  17.  axis.add ; '---------- axis no. 2
  18.  let axis.wv    0.000000    180.000000    0.000000
  19.  let axis.nv    0.000000    360.000000    0.000000
  20.  let axis.u    0.000000
  21.  let axis.v    0.000000
  22.  axis.add ; '---------- axis no. 3
  23.  
  24. ' **patchcount 0
  25.  
  26.  
  27. ' **shapecount 2
  28.  
  29.  let shape.id    1
  30.  let sh.kind    31
  31.  let sh.axis.id    0
  32.  let sh.axis.total    2
  33.  let sh.patch.id    0
  34.  let sh.patch.total    0
  35.  let sh.lrflag    0
  36.  let sh.smoothflag    1
  37.  let sh.kind    31
  38.  let sh.page    0
  39.  let sh.dummy    0
  40.  let sh.bbmin.v    0.000000    0.000000    0.000000
  41.  let sh.bbmax.v    1000.000000    1000.000000    1000.000000
  42.  let sh.matrix.id    1
  43.  let sh.attrib.id    0
  44.  let sh.texture.id    1
  45.  let sh.layer    0
  46.  let sh.name "" 
  47.  shape.add ; '---------- shape no. 0
  48.  
  49.  let shape.id    3
  50.  let sh.kind    31
  51.  let sh.axis.id    2
  52.  let sh.axis.total    2
  53.  let sh.patch.id    0
  54.  let sh.patch.total    0
  55.  let sh.lrflag    0
  56.  let sh.smoothflag    1
  57.  let sh.kind    31
  58.  let sh.page    0
  59.  let sh.dummy    0
  60.  let sh.bbmin.v    500.000000    0.000000    -500.000000
  61.  let sh.bbmax.v    1500.000000    1000.000000    500.000000
  62.  let sh.matrix.id    2
  63.  let sh.attrib.id    0
  64.  let sh.texture.id    2
  65.  let sh.layer    1
  66.  let sh.name "" 
  67.  shape.add ; '---------- shape no. 1
  68.  
  69.  
  70. ' **affinecount 3
  71.  
  72.  let matrix.a 1 0 0 0 
  73.               0 1 0 0 
  74.               0 0 1 0 
  75.               -500 0 500 1 
  76.  matrix.add ; '---------- matrix no. 1
  77.  
  78.  let matrix.a 1 0 0 0 
  79.               0 1 0 0 
  80.               0 0 1 0 
  81.               0 0 0 1 
  82.  matrix.add ; '---------- matrix no. 2
  83.  
  84.  
  85.  
  86. '*****  Attribute no. 0  *****
  87. load.atr 0
  88. let a.rgb     0.2 0.9 0.1
  89. let a.arg     0.15 0.15 0.15
  90. let a.prg     1 1 1
  91. let a.drg     0.6 0.6 0.6
  92. let ambient   0.15
  93. let diffuse   0.6
  94. let p.specl   0.75
  95. let p.spex    35
  96. let opacity   1
  97. let gain.c    1
  98. let gain.l    0
  99. let haze      0
  100. let smooth.sw 1
  101. let map.sw    1
  102. let face.sw   0
  103. let shade.sw  0
  104. set.atr
  105. let atr.point 0
  106. load.atr atr.point
  107.  
  108.  
  109. '*****  Mapping Information no. 0  *****
  110. load.mapinfo 0
  111. let m.ustart 0
  112. let m.uend   1
  113. let m.vstart 0
  114. let m.vend   1
  115. let m.ulen   1
  116. let m.vlen   1
  117. let m.uofs   0
  118. let m.vofs   0
  119. let m.mopa   1
  120. let m.bump   1
  121. let m.xcent  0
  122. let m.ycent  0
  123. let m.zcent  0
  124. let m.xlen   100
  125. let m.ylen   100
  126. let m.zlen   100
  127. let m.kind   2
  128. let m.method 1
  129. let m.tex.id 0
  130. set.mapinfo
  131.  
  132. '*****  Mapping Information no. 1  *****
  133. load.mapinfo 1
  134. let m.ustart 0
  135. let m.uend   1
  136. let m.vstart 0
  137. let m.vend   1
  138. let m.ulen   1
  139. let m.vlen   1
  140. let m.uofs   0
  141. let m.vofs   0
  142. let m.mopa   1
  143. let m.bump   1
  144. let m.xcent  500
  145. let m.ycent  500
  146. let m.zcent  500
  147. let m.xlen   1000
  148. let m.ylen   1000
  149. let m.zlen   1000
  150. let m.kind   2
  151. let m.method 2
  152. let m.tex.id 1
  153. set.mapinfo
  154.  
  155. '*****  Mapping Information no. 2  *****
  156. load.mapinfo 2
  157. let m.ustart 0
  158. let m.uend   1
  159. let m.vstart 0
  160. let m.vend   1
  161. let m.ulen   1
  162. let m.vlen   1
  163. let m.uofs   0
  164. let m.vofs   0
  165. let m.mopa   1
  166. let m.bump   1
  167. let m.xcent  500
  168. let m.ycent  500
  169. let m.zcent  500
  170. let m.xlen   1000
  171. let m.ylen   1000
  172. let m.zlen   1000
  173. let m.kind   2
  174. let m.method 1
  175. let m.tex.id 1
  176. set.mapinfo
  177.  
  178.  
  179. '*****  Mapping list no. 0  *****
  180. load.maplist 0
  181. let m.mapinfo 0
  182. let m.next    0
  183. set.maplist
  184.  
  185. '*****  Mapping list no. 1  *****
  186. load.maplist 1
  187. let m.mapinfo 1
  188. let m.next    0
  189. set.maplist
  190.  
  191. '*****  Mapping list no. 2  *****
  192. load.maplist 2
  193. let m.mapinfo 2
  194. let m.next    3
  195. set.maplist
  196.  
  197. '*****  Mapping list no. 3  *****
  198. load.maplist 3
  199. let m.mapinfo 2
  200. let m.next    4
  201. set.maplist
  202.  
  203. '*****  Mapping list no. 4  *****
  204. load.maplist 4
  205. let m.mapinfo 2
  206. let m.next    5
  207. set.maplist
  208.  
  209. '*****  Mapping list no. 5  *****
  210. load.maplist 5
  211. let m.mapinfo 2
  212. let m.next    6
  213. set.maplist
  214.  
  215. '*****  Mapping list no. 6  *****
  216. load.maplist 6
  217. let m.mapinfo 2
  218. let m.next    7
  219. set.maplist
  220.  
  221. '*****  Mapping list no. 7  *****
  222. load.maplist 7
  223. let m.mapinfo 2
  224. let m.next    8
  225. set.maplist
  226.  
  227. '*****  Mapping list no. 8  *****
  228. load.maplist 8
  229. let m.mapinfo 2
  230. let m.next    9
  231. set.maplist
  232.  
  233. '*****  Mapping list no. 9  *****
  234. load.maplist 9
  235. let m.mapinfo 2
  236. let m.next    0
  237. set.maplist
  238. let ml.point 2
  239. load.maplist ml.point
  240.